home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 7
/
CD FunHouse 7 For The Macintosh (Wayzata)(1992).iso
/
• Interesting Stuff •
/
Sfx stack 4 •••
/
Sfx stack 4 еее
/
card_3047.txt
< prev
next >
Wrap
Text File
|
1989-08-01
|
13KB
|
598 lines
-- card: 3047 from stack: in
-- bmap block id: 5379
-- flags: 4000
-- background id: 2594
-- name:
-- part 1 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=25 top=100 right=122 bottom=171
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Beat It
----- HyperTalk script -----
on mouseUp
play "Beat"
end mouseUp
-- part 2 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=26 top=153 right=174 bottom=172
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Kirk here
----- HyperTalk script -----
on mouseUp
play "Kirk"
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=26 top=179 right=199 bottom=173
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Nasty Boys
----- HyperTalk script -----
on mouseUp
play "NastyBoys"
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=184 top=101 right=122 bottom=306
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Beep
----- HyperTalk script -----
on mouseUp
play "Beeep"
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=184 top=126 right=147 bottom=307
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: He's Dead Jim
----- HyperTalk script -----
on mouseUp
play "Dead"
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=184 top=152 right=173 bottom=306
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Nasty
----- HyperTalk script -----
on mouseUp
play "Nasty"
end mouseUp
-- part 7 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=184 top=179 right=200 bottom=307
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Over the Rainbow
----- HyperTalk script -----
on mouseUp
play "Rainbow"
end mouseUp
-- part 8 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=184 top=205 right=226 bottom=308
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Underdog is here
----- HyperTalk script -----
on mouseUp
play "Here"
end mouseUp
-- part 9 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=184 top=232 right=252 bottom=308
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Yabba Dabba Doo
----- HyperTalk script -----
on mouseUp
play "Yabba"
end mouseUp
-- part 11 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=452 top=234 right=267 bottom=486
-- title width / last selected line: 0
-- icon id / first selected line: 20098 / 20098
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
play "Beeep" c3
answer "Home? But you just got here!" with "Home" or "Stay"
if it is "Stay" then exit mouseUp
visual effect dissolve
go home
end mouseUp
-- part 12 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=61 top=288 right=319 bottom=94
-- title width / last selected line: 0
-- icon id / first selected line: 2478 / 2478
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: About
----- HyperTalk script -----
on mouseUp
visual effect dissolve
go to card 2
end mouseUp
-- part 13 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=20 top=289 right=320 bottom=58
-- title width / last selected line: 0
-- icon id / first selected line: 32670 / 32670
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Play All
----- HyperTalk script -----
on mouseUp
put "Beat It..." into background field "Playing"
play "Beat"
wait until the sound is "done"
put "Beep..." into background field "Playing"
play "Beeep"
wait until the sound is "done"
put "HAL..." into background field "Playing"
play "HAL"
wait until the sound is "done"
put "He's dead Jim..." into background field "Playing"
play "Dead"
wait until the sound is "done"
put "Kirk here..." into background field "Playing"
play "Kirk"
wait until the sound is "done"
put "Nasty..." into background field "Playing"
play "Nasty"
wait until the sound is "done"
put "Nasty Boys..." into background field "Playing"
play "NastyBoys"
wait until the sound is "done"
put "Over the Rainbow..." into background field "Playing"
play "Rainbow"
wait until the sound is "done"
put "No need to fear..." into background field "Playing"
play "Fear"
wait until the sound is "done"
put "Underdog is Here..." into background field "Playing"
play "Here"
wait until the sound is "done"
put "Thunder..." into background field "Playing"
play "Thunder"
wait until the sound is "done"
put "Yabba Dabba Doo" into background field "Playing"
play "Yabba"
wait until the sound is "done"
put "" into background field "Playing"
end mouseUp
-- part 14 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=96 top=285 right=322 bottom=130
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Silly
----- HyperTalk script -----
on mouseUp
put "Charge!" into background field "Playing"
play "Nasty" tempo 300 g3 c4 e gh eq gh
Wait until the sound is "done"
put "" into background field "Playing"
end mouseUp
-- part 17 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=377 top=30 right=51 bottom=488
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Open Stack...
----- HyperTalk script -----
on mouseUp
play "Thunder" tempo 60 c4h
answer "Do you really want to leave this stack?" with "Yes" or "Cancel"
if it is "Cancel" then exit mouseUp
doMenu "Open Stack..."
end mouseUp
-- part 18 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=459 top=296 right=321 bottom=487
-- title width / last selected line: 0
-- icon id / first selected line: 27009 / 27009
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
play "uuuh"
visual effect scroll right
go to card 2
end mouseUp
-- part 20 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=468 top=277 right=294 bottom=487
-- title width / last selected line: 0
-- icon id / first selected line: 6720 / 6720
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Backkk
----- HyperTalk script -----
on mouseUp
pop card
end mouseUp
-- part 21 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=235 top=293 right=311 bottom=266
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: to 3
----- HyperTalk script -----
on mouseUp
visual effect scroll up
go to card 3
end mouseUp
-- part 22 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=177 top=293 right=311 bottom=219
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Toons
----- HyperTalk script -----
on mouseUp
visual effect checkerboard
go to card 4
end mouseUp
-- part 24 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=25 top=127 right=147 bottom=171
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: HAL
----- HyperTalk script -----
on mouseUp
play "HAL"
end mouseUp
-- part 25 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=27 top=205 right=226 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: No need to fear
----- HyperTalk script -----
on mouseUp
play "Fear"
end mouseUp
-- part 26 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=27 top=232 right=252 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Thunder
----- HyperTalk script -----
on mouseUp
play "Thunder"
end mouseUp
-- part 27 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=132 top=285 right=322 bottom=166
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Silly
----- HyperTalk script -----
on mouseUp
put "!egrahC" into background field "Playing"
play "Nasty" tempo 300 g4 e c g3h c4q g3h
Wait until the sound is "done"
put "" into background field "Playing"
end mouseUp
-- part 28 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=12 top=27 right=100 bottom=89
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Spurious
----- HyperTalk script -----
on mouseWithin
play "Beat"
wait until the sound is "Done"
end mouseWithin
-- part 29 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=88 top=51 right=74 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Flash
----- HyperTalk script -----
on mouseWithin
set the hilite of button "Flash" to not the hilite of button "Flash"
end mouseWithin
on mouseLeave
set the hilite of button "Flash" to FALSE
end mouseLeave
-- part 30 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=325 top=139 right=188 bottom=483
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Overkill
----- HyperTalk script -----
on mouseWithin
put "That's DEEEEP!" into background field "Playing"
end mouseWithin
on mouseLeave
put "" into background field "Playing"
end mouseLeave
on mouseDown
put "No! Don't click there!" into background field "Playing"
repeat until the mouse is up
play "Yabba" ch
wait until the sound is "done"
end repeat
end mouseDown
-- part 32 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=274 top=286 right=321 bottom=450
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Flug
----- HyperTalk script -----
on mouseWithin
set the hilite of button "Flash" to not the hilite of button "Flash"
end mouseWithin
on mouseLeave
set the hilite of button "Flash" to FALSE
end mouseLeave
-- part 33 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=378 top=53 right=73 bottom=488
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Remember me?
----- HyperTalk script -----
on mouseUp
set hilite of button "Remember me?" to TRUE
play "Beat" tempo 71 c4h c a3 a c4 c g3h.
wait until the sound is "done"
set hilite of button "Remember me?" to FALSE
end mouseUp